IF exists(SELECT * FROM dbo.sysobjects WHERE name='WEB_leraarsKlassen' AND xtype='P') 
BEGIN
	DROP PROCEDURE WEB_leraarsKlassen
END
GO

CREATE    procedure WEB_leraarsKlassen(@naamcode varchar(7))
as
set nocount on
select 0 as volgNr,'' as klas,0 as klasNr,'' as semNr, '<?xml version=''1.0'' encoding="ISO-8859-1" ?>' as tekst
union
select 1,'',0,'','<opdrachten naamcode="' + isNull(upper(rtrim(@naamcode)),'') + '">'
union
select 2,a.klas + a.vakcode,0,'','<groep><klas>' + isNull(a.klas,'') + '</klas>'
		+ '<vak>' + isNull(v.vaknaam,'') + '</vak>'
from leraars.dbo.ambtsverdeling as a 
        left join leraars.dbo.vakvolgorde as v 
            on a.vakcode = v.vakcode
	where a.naamcode = @naamcode
union 
select 2,a.klas + a.vakcode,klasNr,'','<lln iNr="' + inschrijvingsNr 
		+ '" klasNr="' + convert(varchar(5),klasNr) + '">'  
		+ isnull(voornaam,'') + ' ' + isnull(achternaam,'') + '</lln>'
from leraars.dbo.ambtsverdeling as a 
	left join leerlingen..leerlingen as l
        	on l.klas = a.klas
	where a.naamcode = @naamcode
union
select 2,klas + a.vakcode,999,'','</groep>'
from leraars.dbo.ambtsverdeling as a 
        left join leraars.dbo.vakvolgorde as v 
            on a.vakcode = v.vakcode
	where a.naamcode = @naamcode
union
select 2,sl.groepscode,0,'','<groep><klas>' + isNull(sl.groepscode,'') + '</klas>'
		+ '<vak>' + isNull(sn.vaknaam,'') + '</vak>'
from leraars.dbo.seminarieLeraars as sl
	left join leerlingen.dbo.seminarieNamen as sn
		on sl.groepscode = sn.groepscode
	where sl.naamcode = @naamcode
union 
select 2,sl.groepscode,1,l.naam1,'<lln iNr="' + l.inschrijvingsNr 
		+ '" klasNr="' + convert(varchar(5),l.klasNr) + '">'  
		+ isnull(l.voornaam,'') + ' ' + isnull(l.achternaam,'') + '</lln>'
from leraars.dbo.seminarieLeraars as sl
	left join leerlingen.dbo.seminarieGroepen as sn
		on sl.groepscode = sn.groepscode
	left join leerlingen..leerlingen as l
		on l.inschrijvingsNr = sn.inschrijvingsNr
	where sl.naamcode = @naamcode
union
select 2,sl.groepscode,999,'zzzzzzz','</groep>'
from leraars.dbo.seminarieLeraars as sl
	where sl.naamcode = @naamcode
union 
select 3,'',0,'','</opdrachten>'
order by volgNr,klas,klasNr,semNr